-- background: 93051 from stack: in
-- bmap block id: 64613
-- flags: 0000
-- background id: 0
-- name: Comment Editor
----- HyperTalk script -----
on openBackground
  installMenuBar 1040,1041,1042
end openBackground

on closeBackground
  restoreMenuBar
end closeBackground

on doMenu menuItem
  lock screen
  if menuItem contains "About" then
    go to card short name of this background of background "About"
    unlock screen with zoom close
  else if menuItem is "Home" then
    go home
  else if menuItem contains "Quit" then
    go to card "Mac School® Shell"
    unlock screen with zoom close
  end if
end doMenu